What PC? 1997 February/WPCFEB97.ISO/dxrs/jukebx02.dxr/00029_Build Screens.ls

Text File | 1996-12-09 | 5.7 KB | 148 lines

on buildIntroScreen
  global centralH, centralV
  set the locH of sprite 1 to centralH
  set the locV of sprite 1 to centralV
  set the memberNum of sprite 1 to 1
  set the locH of sprite 45 to centralH + 308
  set the locV of sprite 45 to centralV + 228
  set the memberNum of sprite 45 to 14
  updateStage()
end

on BuildJukeBoxScreen
  global centralH, centralV
  set the locH of sprite 1 to centralH
  set the locV of sprite 1 to centralV - 8
  set the memberNum of sprite 1 to 18
  set the locH of sprite 2 to centralH - 77
  set the locV of sprite 2 to centralV + 81
  set the memberNum of sprite 2 to 41
  set the locH of sprite 3 to centralH + 89
  set the locV of sprite 3 to centralV + 100
  set the memberNum of sprite 3 to 34
  set the locH of sprite 4 to centralH + 89
  set the locV of sprite 4 to centralV
  set the memberNum of sprite 4 to 28
  set the locH of sprite 5 to centralH + 16
  set the locV of sprite 5 to centralV - 240
  set the memberNum of sprite 5 to 48
  set the locH of sprite 6 to centralH + 17
  set the locV of sprite 6 to centralV - 15
  set the memberNum of sprite 6 to 50
  set the locH of sprite 7 to centralH + 17
  set the locV of sprite 7 to centralV - 5
  set the memberNum of sprite 7 to 50
  set the locH of sprite 8 to centralH + 17
  set the locV of sprite 8 to centralV + 5
  set the memberNum of sprite 8 to 50
  set the locH of sprite 9 to centralH + 17
  set the locV of sprite 9 to centralV + 15
  set the memberNum of sprite 9 to 50
  set the locH of sprite 10 to centralH + 17
  set the locV of sprite 10 to centralV + 25
  set the memberNum of sprite 10 to 50
  set the locH of sprite 11 to centralH + 17
  set the locV of sprite 11 to centralV + 35
  set the memberNum of sprite 11 to 50
  set the locH of sprite 12 to centralH + 17
  set the locV of sprite 12 to centralV + 45
  set the memberNum of sprite 12 to 50
  set the locH of sprite 13 to centralH + 17
  set the locV of sprite 13 to centralV + 55
  set the memberNum of sprite 13 to 50
  set the locH of sprite 14 to centralH + 17
  set the locV of sprite 14 to centralV + 65
  set the memberNum of sprite 14 to 50
  set the locH of sprite 15 to centralH + 17
  set the locV of sprite 15 to centralV + 75
  set the memberNum of sprite 15 to 50
  set the locH of sprite 16 to centralH + 17
  set the locV of sprite 16 to centralV + 85
  set the memberNum of sprite 16 to 50
  set the locH of sprite 17 to centralH + 17
  set the locV of sprite 17 to centralV + 95
  set the memberNum of sprite 17 to 50
  set the locH of sprite 18 to centralH + 17
  set the locV of sprite 18 to centralV + 105
  set the memberNum of sprite 18 to 50
  set the locH of sprite 19 to centralH + 17
  set the locV of sprite 19 to centralV + 115
  set the memberNum of sprite 19 to 50
  set the locH of sprite 20 to centralH + 17
  set the locV of sprite 20 to centralV + 125
  set the memberNum of sprite 20 to 50
  set the locH of sprite 21 to centralH + 17
  set the locV of sprite 21 to centralV + 135
  set the memberNum of sprite 21 to 50
  set the locH of sprite 22 to centralH
  set the locV of sprite 22 to centralV + 163
  set the memberNum of sprite 22 to 13
  set the locH of sprite 23 to centralH - 176
  set the locV of sprite 23 to centralV + 130
  set the memberNum of sprite 23 to 10
  set the locH of sprite 24 to centralH - 176
  set the locV of sprite 24 to centralV + 154
  set the memberNum of sprite 24 to 10
  set the locH of sprite 25 to centralH - 176
  set the locV of sprite 25 to centralV + 178
  set the memberNum of sprite 25 to 10
  set the locH of sprite 26 to centralH - 176
  set the locV of sprite 26 to centralV + 202
  set the memberNum of sprite 26 to 10
  set the locH of sprite 27 to centralH - 83
  set the locV of sprite 27 to centralV + 130
  set the memberNum of sprite 27 to 8
  set the locH of sprite 36 to 100
  set the locV of sprite 36 to 2000
  set the castNum of sprite 36 to the number of member "TRBigStart"
  set the locH of sprite 48 to 100
  set the locV of sprite 48 to 2000
  set the ink of sprite 48 to 36
  set the castNum of sprite 48 to the number of member "textStart"
  set the locH of sprite 47 to 147
  set the locV of sprite 47 to 455
  set the ink of sprite 47 to 36
  set the castNum of sprite 47 to the number of member "contacttext"
  set the locH of sprite 28 to centralH + 60
  set the locV of sprite 28 to centralV - 60
  set the memberNum of sprite 28 to 43
  set the locH of sprite 29 to centralH
  set the locV of sprite 29 to centralV
  set the memberNum of sprite 29 to 24
  set the locH of sprite 35 to centralH + 303
  set the locV of sprite 35 to centralV + 80
  set the memberNum of sprite 35 to 48
  set the locH of sprite 34 to centralH - 303
  set the locV of sprite 34 to centralV + 80
  set the memberNum of sprite 34 to 48
  set the locH of sprite 33 to centralH + 303
  set the locV of sprite 33 to centralV + 80
  set the memberNum of sprite 33 to 48
  set the locH of sprite 32 to centralH - 303
  set the locV of sprite 32 to centralV + 80
  set the memberNum of sprite 32 to 48
  set the locH of sprite 45 to centralH + 308
  set the locV of sprite 45 to centralV + 228
  set the memberNum of sprite 45 to 14
  set the locH of sprite 31 to centralH + 304
  set the locV of sprite 31 to centralV + 80
  set the memberNum of sprite 31 to 48
  set the locH of sprite 30 to centralH - 304
  set the locV of sprite 30 to centralV + 80
  set the memberNum of sprite 30 to 48
  updateStage()
end

on BuildExitScreen
  global centralH, centralV
  repeat with r = 1 to 48
    set the memberNum of sprite r to 35
  end repeat
  set the memberNum of sprite 1 to 170
  set the loc of sprite 1 to point(centralH, centralV)
  set the memberNum of sprite 45 to 14
  set the loc of sprite 45 to point(centralH + 308, centralV + 228)
  puppetSound(4, 153)
  updateStage()
end